CAAPlanetPerihelionAphelion_MarsPerihelion <-
function(k){
.Call("CAAPlanetPerihelionAphelion_MarsPerihelion", k)
}
